/**
 * Trabajo de Ingeniería de Software 2
 * Año 2008
 * Sistema de Reserva de Recursos.
 * Desarrolladores: - Marcelo Ferreira.
 *                  - Christian Gómez.
 *                  - Marcelo Rodas.
 */
package controller;

import java.util.List;
import java.util.Map;
import javax.annotation.Resource;
import javax.faces.component.UIComponent;
import javax.faces.context.FacesContext;
import javax.faces.model.SelectItem;
import javax.persistence.EntityManager;
import javax.persistence.EntityManagerFactory;
import javax.persistence.PersistenceUnit;
import javax.persistence.Query;
import javax.faces.application.FacesMessage;
import java.lang.reflect.InvocationTargetException;
import java.lang.reflect.Method;
import javax.faces.FacesException;
import java.util.HashMap;
import javax.faces.validator.ValidatorException;
import javax.transaction.UserTransaction;
import modelo.Recurso;
import modelo.Reserva;
import modelo.Tiporecurso;
import java.util.ArrayList;
import java.util.Arrays;
import java.util.Collection;
import java.util.Vector;

/**
 * Controlador de las Funcionalidades de Recurso.
 * Utilizado para manejar la capa de controlador (MVC)
 * del sistema.
 * @author cgomez
 * @version 1.0
 */
public class RecursoController {
    // POJO de Recurso Representada.    
    private Recurso recurso = null;
    // Lista de Recurso   
    private List<Recurso> recursos = null;
    // Transacción del usuario.    
    @Resource
    private UserTransaction utx = null;
    // Administrador de la Persistencia de los Recurso.
    // Relaciona al Controlador con el Modelo (MVC    
    @PersistenceUnit(unitName = "sistemaReservaPU")
    private EntityManagerFactory emf = null;

    /**
     * Getter del Administrador de Entidades.
     * @return EntityManager
     */
    public EntityManager getEntityManager() {
        return emf.createEntityManager();
    }
    // ---------- Variables para paginar en el jsp -------------
    // variable auxiliar que indica el tamaño de conjunto
    public int batchSize = 100;
    // variable auxiliar para indicar el 1er elemento
    private int firstItem = 0;
    // variable auxiliar utilizado como contador de elementos
    private int itemCount = -1;

    /**
     * Setter de la coleccion de Reserva de los Recurso's
     * @param reservaCollection coleccion de Reserva
     */    
    public void setReservaCollectionOfRecurso(Reserva[] reservaCollection) {
        List<Reserva> reservaCollectionList = Arrays.asList(reservaCollection);
        recurso.setReservaCollection(reservaCollectionList);
    }
    
    /**
     * Getter del Reserva de los Recurso's
     * @return colleccion de Reserva
     */
    public Reserva[] getReservaCollectionOfRecurso() {
        Collection<Reserva> reservaCollection = recurso.getReservaCollection();
        if (reservaCollection == null) {
            return new Reserva[0];
        }
        return reservaCollection.toArray(new Reserva[0]);
    }
    
    /**
     * Metodo para obtener una lista de los Recurso's disponibles de varias selecciones
     * @return lista de Recurso
     */
    public SelectItem[] getRecursosAvailableSelectMany() {
        return getRecursosAvailable(false);
    }
    
    /**
     * Metodo publico para obtener una lista de los Recurso's disponibles de una sola seleccion
     * @return lista de Recurso
     */
    public SelectItem[] getRecursosAvailableSelectOne() {
        return getRecursosAvailable(true);
    }
    
    /**
     * Metodo privado para obtener una lista de los Recurso disponibles de una sola seleccion
     * @return lista de Recurso
     */
    private SelectItem[] getRecursosAvailable(boolean one) {
        List<Recurso> allRecursos = getRecursos(true);
        int size = one ? allRecursos.size() + 1 : allRecursos.size();
        SelectItem[] items = new SelectItem[size];
        int i = 0;
        if (one) {
            items[0] = new SelectItem("", "---");
            i++;
        }
        for (Recurso x : allRecursos) {
            items[i++] = new SelectItem(x, x.toString());
        }
        return items;
    }
    
    /**
     * Metodo para obtener el objeto Recurso del Request
     * @return el objeto Recurso obtenido
     */
    public Recurso getRecurso() {
        if (recurso == null) {
            recurso = getRecursoFromRequest();
        }
        if (recurso == null) {
            recurso = new Recurso();
        }
        return recurso;
    }
    
    /**
     * Metodo para resetear los valores de inicio y llamar al Tag de Lista de Recurso
     * @return el tag de la Lista de Recurso
     */
    public String listSetup() {
        reset(true);
        return "recurso_list";
    }
    
    /**
     * Metodo para inicializar los valores del Objeto Recurso para un nuevo objeto
     * @return el Tag del JSP para crear una nueva entrada de Recurso
     */
    public String createSetup() {
        reset(false);
        recurso = new Recurso(this.getItemMax());
        return "recurso_create";
    }
    
    /**
     * Metodo publico para crear una nueva entrada de Recurso
     * @return el Tag del siguiente JSP a desplegar
     */
    public String create() {
        if (recurso.getReservaCollection() == null) {
            recurso.setReservaCollection(new ArrayList<Reserva>());
        }
        EntityManager em = getEntityManager();
        try {
            utx.begin();
            Tiporecurso idTipoRecurso = recurso.getIdTipoRecurso();
            if (idTipoRecurso != null) {
                idTipoRecurso = em.getReference(idTipoRecurso.getClass(), idTipoRecurso.getIdTipoRecurso());
                recurso.setIdTipoRecurso(idTipoRecurso);
            }
            List<Reserva> attachedReservaCollection = new ArrayList<Reserva>();
            for (Reserva reservaCollectionReservaToAttach : recurso.getReservaCollection()) {
                reservaCollectionReservaToAttach = em.getReference(reservaCollectionReservaToAttach.getClass(), reservaCollectionReservaToAttach.getIdReserva());
                attachedReservaCollection.add(reservaCollectionReservaToAttach);
            }
            recurso.setReservaCollection(attachedReservaCollection);
            em.persist(recurso);
            if (idTipoRecurso != null) {
                idTipoRecurso.getRecursoCollection().add(recurso);
                idTipoRecurso = em.merge(idTipoRecurso);
            }
            for (Reserva reservaCollectionReserva : recurso.getReservaCollection()) {
                Recurso oldIdRecursoOfReservaCollectionReserva = reservaCollectionReserva.getIdRecurso();
                reservaCollectionReserva.setIdRecurso(recurso);
                reservaCollectionReserva = em.merge(reservaCollectionReserva);
                if (oldIdRecursoOfReservaCollectionReserva != null) {
                    oldIdRecursoOfReservaCollectionReserva.getReservaCollection().remove(reservaCollectionReserva);
                    oldIdRecursoOfReservaCollectionReserva = em.merge(oldIdRecursoOfReservaCollectionReserva);
                }
            }
            utx.commit();
            addSuccessMessage("El Recurso fue creado con éxito.");
        } catch (Exception ex) {
            try {
                if (findRecurso(recurso.getIdRecurso()) != null) {
                    addErrorMessage("Recurso " + recurso + " ya existe.");
                } else {
                    ensureAddErrorMessage(ex, "Ha ocurrido un error de persistencia.");
                }
                utx.rollback();
            } catch (Exception e) {
                ensureAddErrorMessage(e, "Ocurrió un error al intentar deshacer la transacción.");
            }
            return null;
        } finally {
            em.close();
        }
        return listSetup();
    }
    
     /**
     * Funcion de Navegacion a la Pagina DetalleRecurso.jsp de los Objetos Recurso
     * @return String
     */    
    public String detalleSetup() {
        return scalarSetup("recurso_detalle");
    }
    
     /**
     * Funcion de Navegacion a la Pagina Detail.jsp de los Objetos Recurso
     * @return String
     */   
    public String detailSetup() {
        return scalarSetup("recurso_detail");
    }
    
    /**
     * Funcion de Navegacion a la Pagina Edicion de los Recurso's
     * @return String
     */
    public String editSetup() {
        return scalarSetup("recurso_edit");
    }
    
    /*
     * Función de Navegación General, controla si existe la ruta de
     * navegación.
     */
    private String scalarSetup(String destination) {
        reset(false);
        recurso = getRecursoFromRequest();
        if (recurso == null) {
            String requestRecursoString = getRequestParameter("jsfcrud.currentRecurso");
            addErrorMessage("El recurso con el id " + requestRecursoString + " ya no existe.");
            String relatedControllerOutcome = relatedControllerOutcome();
            if (relatedControllerOutcome != null) {
                return relatedControllerOutcome;
            }
            return listSetup();
        }
        return destination;
    }
    
    /**
     * Función publica que procesa los cambios realizados sobre los
     * Recurso's Representados.
     * @return String
     */
    public String edit() {
        RecursoConverter converter = new RecursoConverter();
        String recursoString = converter.getAsString(FacesContext.getCurrentInstance(), null, recurso);
        String currentRecursoString = getRequestParameter("jsfcrud.currentRecurso");
        if (recursoString == null || recursoString.length() == 0 || !recursoString.equals(currentRecursoString)) {
            String outcome = editSetup();
            if ("recurso_edit".equals(outcome)) {
                addErrorMessage("No se puede editar el recurso. Intente nuevamente.");
            }
            return outcome;
        }
        EntityManager em = getEntityManager();
        try {
            utx.begin();
            Recurso persistentRecurso = em.find(Recurso.class, recurso.getIdRecurso());
            Tiporecurso idTipoRecursoOld = persistentRecurso.getIdTipoRecurso();
            Tiporecurso idTipoRecursoNew = recurso.getIdTipoRecurso();
            Collection<Reserva> reservaCollectionOld = persistentRecurso.getReservaCollection();
            Collection<Reserva> reservaCollectionNew = recurso.getReservaCollection();
            if (idTipoRecursoNew != null) {
                idTipoRecursoNew = em.getReference(idTipoRecursoNew.getClass(), idTipoRecursoNew.getIdTipoRecurso());
                recurso.setIdTipoRecurso(idTipoRecursoNew);
            }
            List<Reserva> attachedReservaCollectionNew = new ArrayList<Reserva>();
            for (Reserva reservaCollectionNewReservaToAttach : reservaCollectionNew) {
                reservaCollectionNewReservaToAttach = em.getReference(reservaCollectionNewReservaToAttach.getClass(), reservaCollectionNewReservaToAttach.getIdReserva());
                attachedReservaCollectionNew.add(reservaCollectionNewReservaToAttach);
            }
            reservaCollectionNew = attachedReservaCollectionNew;
            recurso.setReservaCollection(reservaCollectionNew);
            recurso = em.merge(recurso);
            if (idTipoRecursoOld != null && !idTipoRecursoOld.equals(idTipoRecursoNew)) {
                idTipoRecursoOld.getRecursoCollection().remove(recurso);
                idTipoRecursoOld = em.merge(idTipoRecursoOld);
            }
            if (idTipoRecursoNew != null && !idTipoRecursoNew.equals(idTipoRecursoOld)) {
                idTipoRecursoNew.getRecursoCollection().add(recurso);
                idTipoRecursoNew = em.merge(idTipoRecursoNew);
            }
            for (Reserva reservaCollectionOldReserva : reservaCollectionOld) {
                if (!reservaCollectionNew.contains(reservaCollectionOldReserva)) {
                    reservaCollectionOldReserva.setIdRecurso(null);
                    reservaCollectionOldReserva = em.merge(reservaCollectionOldReserva);
                }
            }
            for (Reserva reservaCollectionNewReserva : reservaCollectionNew) {
                if (!reservaCollectionOld.contains(reservaCollectionNewReserva)) {
                    Recurso oldIdRecursoOfReservaCollectionNewReserva = reservaCollectionNewReserva.getIdRecurso();
                    reservaCollectionNewReserva.setIdRecurso(recurso);
                    reservaCollectionNewReserva = em.merge(reservaCollectionNewReserva);
                    if (oldIdRecursoOfReservaCollectionNewReserva != null && !oldIdRecursoOfReservaCollectionNewReserva.equals(recurso)) {
                        oldIdRecursoOfReservaCollectionNewReserva.getReservaCollection().remove(reservaCollectionNewReserva);
                        oldIdRecursoOfReservaCollectionNewReserva = em.merge(oldIdRecursoOfReservaCollectionNewReserva);
                    }
                }
            }
            utx.commit();
            addSuccessMessage("El Recurso fue actualizado con éxto.");
        } catch (Exception ex) {
            try {
                String msg = ex.getLocalizedMessage();
                if (msg != null && msg.length() > 0) {
                    addErrorMessage(msg);
                } else if (getRecursoFromRequest() == null) {
                    addErrorMessage("El recurso con el id " + currentRecursoString + " ya no existe.");
                    utx.rollback();
                    return listSetup();
                } else {
                    addErrorMessage("Ha ocurrido un error de persitencia.");
                }
                utx.rollback();
            } catch (Exception e) {
                ensureAddErrorMessage(e, "Ocurrió un error al intentar deshacer la transacción.");
            }
            return null;
        } finally {
            em.close();
        }
        return detailSetup();
    }
    
    /**
     * Funcion que permite la eliminacion de una entrada de Recurso
     * @return String
     */
    public String destroy() {
        recurso = getRecursoFromRequest();
        if (recurso == null) {
            String currentRecursoString = getRequestParameter("jsfcrud.currentRecurso");
            addErrorMessage("El recurso con el id " + currentRecursoString + " ya no existe.");
            String relatedControllerOutcome = relatedControllerOutcome();
            if (relatedControllerOutcome != null) {
                return relatedControllerOutcome;
            }
            return listSetup();
        }
        EntityManager em = getEntityManager();
        try {
            utx.begin();
            recurso = em.getReference(recurso.getClass(), recurso.getIdRecurso());
            Tiporecurso idTipoRecurso = recurso.getIdTipoRecurso();
            if (idTipoRecurso != null) {
                idTipoRecurso.getRecursoCollection().remove(recurso);
                idTipoRecurso = em.merge(idTipoRecurso);
            }
            Collection<Reserva> reservaCollection = recurso.getReservaCollection();
            for (Reserva reservaCollectionReserva : reservaCollection) {
                reservaCollectionReserva.setIdRecurso(null);
                reservaCollectionReserva = em.merge(reservaCollectionReserva);
            }
            em.remove(recurso);
            utx.commit();
            addSuccessMessage("El recurso fue eliminado con éxito.");
        } catch (Exception ex) {
            try {
                ensureAddErrorMessage(ex, "Ha ocurrido un error de persistencia.");
                utx.rollback();
            } catch (Exception e) {
                ensureAddErrorMessage(e, "Ocurrió un error al intentar deshacer la transacción.");
            }
            return null;
        } finally {
            em.close();
        }
        String relatedControllerOutcome = relatedControllerOutcome();
        if (relatedControllerOutcome != null) {
            return relatedControllerOutcome;
        }
        return listSetup();
    }
    
    /**
     * Función privada para obtener el Objeto Recurso del Request.
     * @return Recurso
     */
    private Recurso getRecursoFromRequest() {
        String theId = getRequestParameter("jsfcrud.currentRecurso");
        return (Recurso) new RecursoConverter().getAsObject(FacesContext.getCurrentInstance(), null, theId);
    }
    /**
     * Función para obtener un valor del request.
     * @param key
     * @return String
     */
    private String getRequestParameter(String key) {
        return FacesContext.getCurrentInstance().getExternalContext().getRequestParameterMap().get(key);
    }
    
    /**
     * Getter de Recurso (atributo local).
     * @return List<Recurso>
     */
    public List<Recurso> getRecursos() {
        if (recursos == null) {
            recursos = getRecursos(false);
        }
        return recursos;
    }
    
    /**
     * Getter de todos los Recruso's (de la Base de Datos)
     * @param all
     * @return List<Recurso>
     */
    public List<Recurso> getRecursos(boolean all) {
        EntityManager em = getEntityManager();
        //Tiporecurso TIPORECURSO = this.getRecursoFromRequest().getIdTipoRecurso();
        try {
            Query q = em.createQuery("select object(o) from Recurso as o");
            if (!all) {
                q.setMaxResults(batchSize);
                q.setFirstResult(getFirstItem());
            }
            return q.getResultList();
        } finally {
            em.close();
        }
    }
    
    /*
     *-------------------------------------------------------------------
     * Funciones de manejo de Mensajes y Errores.
     *-------------------------------------------------------------------
     */
    /**
     * Asegura que se almacenen los errores
     * @param ex
     * @param defaultMsg
     */
    private void ensureAddErrorMessage(Exception ex, String defaultMsg) {
        String msg = ex.getLocalizedMessage();
        if (msg != null && msg.length() > 0) {
            addErrorMessage(msg);
        } else {
            addErrorMessage(defaultMsg);
        }
    }
    
    /**
     * Agrega mensajes de Error para la Página.
     * @param msg
     */
    public static void addErrorMessage(String msg) {
        FacesMessage facesMsg = new FacesMessage(FacesMessage.SEVERITY_ERROR, msg, msg);
        FacesContext.getCurrentInstance().addMessage(null, facesMsg);
    }
    
    /**
     * Agrega mensajes de Exito para la Página.
     * @param msg
     */
    public static void addSuccessMessage(String msg) {
        FacesMessage facesMsg = new FacesMessage(FacesMessage.SEVERITY_INFO, msg, msg);
        FacesContext.getCurrentInstance().addMessage("successInfo", facesMsg);
    }
    
    /**
     * Obtiene un Objeto Recurso con el id correspondiente.
     * @param id tipo idRecurso
     * @return Objeto Recurso
     */ 
    public Recurso findRecurso(Integer id) {
        EntityManager em = getEntityManager();
        try {
            Recurso o = (Recurso) em.find(Recurso.class, id);
            return o;
        } finally {
            em.close();
        }
    }
    
    /**
     * ------------------------------------------
     * Funciones de Iteración
     * ------------------------------------------
     */
    
    /**
     * Funcion para obtener una cuenta de todos los items de esta clase
     * @return int
     */    
    public int getItemCount() {
        if (itemCount == -1) {
            EntityManager em = getEntityManager();
            try {
                itemCount = ((Long) em.createQuery("select count(o) from Recurso as o").getSingleResult()).intValue();
            } finally {
                em.close();
            }
        }
        return itemCount;
    }
    
    /**
     * Funcion para obtener el primer item de esta clase
     * @return int
     */
    public int getFirstItem() {
        getItemCount();
        if (firstItem >= itemCount) {
            if (itemCount == 0) {
                firstItem = 0;
            } else {
                int zeroBasedItemCount = itemCount - 1;
                double pageDouble = zeroBasedItemCount / batchSize;
                int page = (int) Math.floor(pageDouble);
                firstItem = page * batchSize;
            }
        }
        return firstItem;
    }
    
    /**
     * Funcion para obtener el ultimo item de esta clase
     * @return int
     */
    public int getLastItem() {
        getFirstItem();
        return firstItem + batchSize > itemCount ? itemCount : firstItem + batchSize;
    }
    
    /**
     * Funcion para obtener el tamaño de datos a desplegar de esta clase
     * @return int
     */
    public int getBatchSize() {
        return batchSize;
    }
    
    /**
     * Funcion para obtener el siguiente item de esta clase
     * @return int
     */
    public String next() {
        reset(false);
        getFirstItem();
        if (firstItem + batchSize < itemCount) {
            firstItem += batchSize;
        }
        return "recurso_list";
    }
    
    /**
     * Funcion para obtener el item anterior de esta clase
     * @return int
     */
    public String prev() {
        reset(false);
        getFirstItem();
        firstItem -= batchSize;
        if (firstItem < 0) {
            firstItem = 0;
        }
        return "recurso_list";
    }
    
    /**
     * Funcion para saber de que contexto esta viniendo la peticion
     * @return String
     */
    private String relatedControllerOutcome() {
        String relatedControllerString = getRequestParameter("jsfcrud.relatedController");
        String relatedControllerTypeString = getRequestParameter("jsfcrud.relatedControllerType");
        if (relatedControllerString != null && relatedControllerTypeString != null) {
            FacesContext context = FacesContext.getCurrentInstance();
            Object relatedController = context.getApplication().getELResolver().getValue(context.getELContext(), null, relatedControllerString);
            try {
                Class<?> relatedControllerType = Class.forName(relatedControllerTypeString);
                Method detailSetupMethod = relatedControllerType.getMethod("detailSetup");
                return (String) detailSetupMethod.invoke(relatedController);
            } catch (ClassNotFoundException e) {
                throw new FacesException(e);
            } catch (NoSuchMethodException e) {
                throw new FacesException(e);
            } catch (IllegalAccessException e) {
                throw new FacesException(e);
            } catch (InvocationTargetException e) {
                throw new FacesException(e);
            }
        }
        return null;
    }
    
    /**
     * Borra la referencia al objeto Representado (Borrado sin persistencia).
     * @param resetFirstItem
     */
    private void reset(boolean resetFirstItem) {
        recurso = null;
        recursos = null;
        itemCount = -1;
        if (resetFirstItem) {
            firstItem = 0;
        }
    }
    private Map<Object, String> asString = null;
    
    /**
     * Mapea el tipo de Objeto a un tipo String
     * @return Map<Object, String>
     */
    public Map<Object, String> getAsString() {
        if (asString == null) {
            asString = new HashMap<Object, String>() {

                @Override
                public String get(Object key) {
                    if (key instanceof Object[]) {
                        Object[] keyAsArray = (Object[]) key;
                        if (keyAsArray.length == 0) {
                            return "(No Items)";
                        }
                        StringBuffer sb = new StringBuffer();
                        for (int i = 0; i < keyAsArray.length; i++) {
                            if (i > 0) {
                                sb.append("<br />");
                            }
                            sb.append(keyAsArray[i]);
                        }
                        return sb.toString();
                    }
                    return new RecursoConverter().getAsString(FacesContext.getCurrentInstance(), null, (Recurso) key);
                }
            };
        }
        return asString;
    }
    
    /**
     * Función que Vincula y Valida JSP con el Objeto Recurso Representado.
     * @param facesContext
     * @param component
     * @param value
     */
    public void validateCreate(FacesContext facesContext, UIComponent component, Object value) {
        RecursoConverter converter = new RecursoConverter();
        String newRecursoString = converter.getAsString(FacesContext.getCurrentInstance(), null, new Recurso());
        String recursoString = converter.getAsString(FacesContext.getCurrentInstance(), null, recurso);
        if (!newRecursoString.equals(recursoString)) {
            createSetup();
        }
    }
    
    /**
     * Metodo para obtener el mayor IdRecurso de los disponibles
     * @return Integer
     */
    public int getItemMax() {
        EntityManager em = getEntityManager();
        String SQL;
        Integer s = 0;
        try {
            SQL = "select f_generar_idrecursos()";
            Query q = em.createNativeQuery(SQL);
            Vector v = new Vector();
            v = (Vector) q.getSingleResult();
            s = (Integer) v.get(0);
        } finally {
            em.close();
        }
        return s;
    }
    

}
